home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Dr. Windows 3
/
dr win3.zip
/
dr win3
/
PROGRAMR
/
WTJ208.ZIP
/
STOMPER
/
NEWPROJ.FRM
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1993-05-10
|
3KB
|
106 lines
NewProj
Add New Project
Form15
AddProjBtn
Cancel
AddProjBtn
Accept
NewProjName
ProjNumber
Project Number:
Label1
Project:
AddProjBtn_Click
Index"
Form_Load
NewProjName
DataSourceJ
DataField
NewProjName_Changea
ProjNumber
NewProjectName
SetRec
NewProj
WindowState
NORMAL
EditMode
AddingV
Deleting
Editing
ProjList
ListIndex
ProjNum
ProjForm
IntMid
FillProjList
CheckBlank
CurRec
FindRec
CurrRec
FixList
ListCount
ListPos
FillProjRec
AddProjBtn_Click
Add,Edit or Delete?h
In Add Modee
Cancel or Save pressed?e
Save pressed
Ensure data in the field
Open a new recorde
ProjNum
Set new project number
ProjName
Transfer project namej
Set the new record
Go to bottom of the list
Empty, refill list and set highlight
Cancel pressed
Add Cancelled
End Cancel or Save Button IndexE
In Edit Mode
Cancel or Save pressed?i
Save pressed
Ensure data in the field
ProjName
Set new project name
ProjNum
Save record number
Set the record
Empty, refill list and set highlight
Cancel pressed
Edit Cancelled
End Cancel or Save Button IndexE
In Delete mode
Cancel or Save pressed?i
Save pressed
Save spot in listx
delete current recordl
Empty, refill list and set highlight
Cancel pressed
Delete Cancelled
End Cancel or Save Button IndexE
End EditMode
Exit record maintenance mode
For a blank record
Must Provide Project Name
Reset cursor
Form_Load
Depending on accessf
When addinga
Process errors
Go to last record
ProjNum
Increment project
Project Number:
Display new number
When deleting
Find selected project
Display its data
When changing
Find selected record
Display its data
Go to edit mode
When no records
start at one